home *** CD-ROM | disk | FTP | other *** search
/ CyberMycha Extra 2004 January / CyberMycha Extra 1-2004 (Poland) (Disc 2).bin / Pippi / gmgs.dir / Internal_14_score--springer.ls < prev    next >
Encoding:
Text File  |  2001-09-05  |  1.0 KB  |  47 lines
  1. property tix, tixV, zP, mmV, horseSprite, randomDelayCounter, Counter
  2. global gmObject
  3.  
  4. on beginSprite me
  5.   Counter = gmObject.backCounter
  6.   randomDelayCounter = 0
  7.   horseSprite = gmObject.horseSprites[1]
  8.   tixV = 8
  9.   tix = the ticks + tixV
  10. end
  11.  
  12. on exitFrame me
  13.   if (gmObject.speed > 0) and (gmObject.dontTrig < 2) then
  14.     Counter = Counter + 1
  15.     if Counter > 30 then
  16.       randomDelayCounter = randomDelayCounter + 1
  17.       if randomDelayCounter > (3 - gmObject.overAllSpeed) then
  18.         randomDelayCounter = 0
  19.         gmObject.trigThings()
  20.       end if
  21.     end if
  22.   end if
  23.   go(the frame)
  24. end
  25.  
  26. on idle
  27.   if the keyDownScript = EMPTY then
  28.     zP = horseSprite.locH
  29.     if the ticks > tix then
  30.       mmV = (the mouseH - zP) / 15
  31.       gmObject.mouseHX(mmV)
  32.       tix = the ticks + tixV
  33.     end if
  34.   end if
  35. end
  36.  
  37. on mouseDown me
  38.   if (the mouseV > 71) and (the mouseV < 516) then
  39.     if the keyDownScript = EMPTY then
  40.       gmObject.jump()
  41.     else
  42.       set the keyDownScript to EMPTY
  43.       gmObject.jump()
  44.     end if
  45.   end if
  46. end
  47.